home *** CD-ROM | disk | FTP | other *** search
/ Skunkware 5 / Skunkware 5.iso / src / Tools / freeWAIS-sf-1.1 / lib / trunc.c < prev    next >
Encoding:
C/C++ Source or Header  |  1994-08-04  |  412 b   |  29 lines
  1.  
  2. /* Copyright (c) CNIDR (see ../COPYRIGHT) */
  3.  
  4. #include <stdio.h>
  5.  
  6. main(argc, argv)
  7. int argc;
  8. char **argv;
  9. {
  10.   int len, i, c;
  11.  
  12.   if (argc != 2) {
  13.     fprintf(stderr, "Usage: %s length\n", argv[0]);
  14.     exit(-1);
  15.   }
  16.  
  17.   len = atoi(argv[1]);
  18.   i = 0;
  19.   while (EOF != (c = getchar())) {
  20.     if (c == '\n') {
  21.       putchar(c);
  22.       fflush(stdout);
  23.       i = 0;
  24.     }
  25.     else if (i++ < len)
  26.       putchar(c);
  27.   }
  28. }
  29.